home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / SphereShift.dxr / Internal_15_new button.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  482 b   |  26 lines

  1. property spriteNum, maname
  2. global currentStage, pScore, ScoreTotal, ScoreBoxTotal
  3.  
  4. on beginSprite me
  5.   maname = sprite(spriteNum).member.name
  6. end
  7.  
  8. on mouseDown me
  9.   sprite(spriteNum).member = maname & "3"
  10.   ScoreTotal = ScoreTotal - pScore
  11.   pScore = 0
  12.   go(currentStage)
  13. end
  14.  
  15. on mouseUp me
  16.   sprite(spriteNum).member = maname
  17. end
  18.  
  19. on mouseEnter me
  20.   sprite(spriteNum).member = maname & "2"
  21. end
  22.  
  23. on mouseLeave me
  24.   sprite(spriteNum).member = chars(maname, 1, maname.char.count)
  25. end
  26.